﻿Imports System
Imports System.Collections
Imports System.Configuration
Imports System.Data
Imports System.Linq
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.HtmlControls
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Imports System.Xml.Linq
Imports Controladores

 _

Class consultarCarteraOper
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)


        If Session("privUser") Is Nothing Or Integer.Parse(Session("privUser").ToString()) < 1 Then
            Response.Redirect("Index.aspx")
        End If

        If Session("privUser") Is Nothing Or Integer.Parse(Session("privUser").ToString()) < 2 Then
            campoDNI.Text = Session("DNIUser").ToString()
            campoDNI.Enabled = False
            BotonAceptar.Enabled = False
            If Not (Session("DNIUser") Is Nothing) Then
                listaCartera.Value = controlador.listarCartera(Session("DNIUser").ToString())
            End If
        Else
            campoDNI.Enabled = True
            BotonAceptar.Enabled = True
        End If
    End Sub 'Page_Load


    Protected Sub aceptarDNI(ByVal sender As Object, ByVal e As EventArgs)
        listaCartera.Value = controlador.listarCartera(campoDNI.Text.ToString())
    End Sub 'aceptarDNI
End Class 'consultarCarteraOper